home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Overload Trio 2
/
Shareware Overload Trio Volume 2 (Chestnut CD-ROM).ISO
/
dir37
/
shl.zip
/
FOXPRO.ZIP
/
SHL.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1994-06-14
|
13KB
|
245 lines
2.0Fl
FOXUSER.DBF
FOXUSER.DBF
DEBUG
RUNTIMEFFlj
EXEFFlj
ANSIFF
RECALL
DEBUG
CHR(27)+"@"
CHR(27)+"P"
CHR(27)+"M"
CHR(27)+CHR(15)
CHR(27)+CHR(69)
CHR(27)+CHR(70)
CHR(27)+CHR(45)+CHR(1)
CHR(27)+CHR(45)+CHR(0)
AMERICAN
SET PATH TO &cPROGPATH
SCRPROC
SHLUTA
SHLSYS
DO FOXERR WITH ERROR(), MESSAGE(), MESSAGE(1), PROGRAM(), LINENO(), SYS(16)
DEFAULT
FONTNAME
FONTSTYLE
FONTSIZE
SCHEME
MODIFY WINDOW SCREEN TITLE "Foxpro for Macintosh" &cFONTS
MODIFY WINDOW SCREEN TITLE "Foxpro for Windows" &cFONTS
FOXDEF
DEFAULT8
The system date has not been set. Use the operating system DATE command
to set today's date. At the operating system prompt, type a command of
the form:
DATE 07.07.87
... and press the RETURN key, which may be marked ENTER or
. The
above command would set the date to July 7, 1987. Once you have done
this you can run this program again.
Press any key to return to the operating system . . .
Diskspace too small for application...
Press any key to return to the operating system . . .
Warning: Your CONFIG.SYS should have a FILES=65 (45 minimum)
Proceed at your own risk...
Press any key to continue, [Esc] to return to the operating system . . .
RESOURCEz
No resource file available. It may be in use or may not exist.
Check your SET FOXPROCFG= and/or -C commands. Also check your
RESOURCE = command in your CONFIG.FP...
Press any key to return to the operating system . . .
Warning: This application is over three months old, and is likely out
of date. Read the file REGISTER.DOC to learn how to obtain
a registered copy.
Press any key to continue using this application . . .
Please remember to exit this application before turning off the computer...
Press any key to continue . . .
Multi-user
Foxpro Shell, Version 01.02.02
(c) 1993 Dennis Allen, All rights reserved
AMERICAN
SET PATH TO &cPROGPATH
SCRPROC
DO FOXERR WITH ERROR(), MESSAGE(), MESSAGE(1), PROGRAM(), LINENO(), SYS(16)
DEFAULT
FONTNAME
FONTSTYLE
FONTSIZE
SCHEME
MODIFY WINDOW SCREEN TITLE "Foxpro for Macintosh" &cFONTS
MODIFY WINDOW SCREEN TITLE "Foxpro for Windows" &cFONTS
FOXDEF
DEFAULT8
Multi-user
Foxpro Shell, Version 01.02.02
(c) 1993 Dennis Allen, All rights reserved
DO INS
ALT+O
DO OBJLOCK
ALT+V
DO VIDEO
DO FLD_HELP WITH IIF(nLEVEL>0,cWINDOW(nLEVEL),""), 0
DO EJECT
KEYBOARD CHR(23)
ALT+D
DO DEBUGGER WITH PROGRAM(), LINENO()
ALT+E
DO FOXERR WITH 0, "Log Entry", MESSAGE(1), PROGRAM(), LINENO(), SYS(16)
ALT+F4
DO LOAD_CALC
CTRL+F4
DO SET_CALC
ALT+F5
DO LOAD_CALR
CTRL+F5
DO SET_CALR
ALT+F
KEYBOARD "GFQ"
ALT+L
KEYBOARD "GLQ"
ALT+N
KEYBOARD "GNQ"
ALT+P
KEYBOARD "GPQ"
ALT+T
KEYBOARD "{CTRL-T}Y"
SHLUSER
bMULTf
M A I N M E N U
[\<E] - Edit Shell List
[\<P] - Print Shell List
[\<R] - Return to Protected Mode
[\<S] - System Setup (Query)
[\<U] - Utilities
[\<M] - Change Status (F
Multi
Single8
-user)
[\<Q] - Quit this program
EPRSUMQ
Are you Sure (Y or N) ?
CPATH_SEP
CDRIV_SEP
CFOXUSER
FNPATH
CMEMPATH
FNGETENV
CDATAPATH
CPROGPATH
CTEMPPATH
BMULT
BDEBUG
BANSI
BINIT
BRECALL
CWINDOW
NWINDOW
NLEVEL
NSTART
BLOCATE
BNO_CDX
BEXACT
BNO_INT
BUNIQUE
CFONT
CSTYLE
NMEMOWIDTHNFONT
NSCHEME
NTO_READ
CBROWSE
CINDEX
CFILTER
CPR_NAME
CPR_PRN
CPR_DEF
CPR_10
CPR_12
CPR_CON
CPR_BON
CPR_BOFF
CPR_UON
CPR_UOFF
NPR_MAX
NPR_SW
BPR_DRAFT
AMERICAN
SCRPROC
THCMASTER
CREINDEX
CSYSTEM
COLORSET
SYSM_DOS
CFONTS
FNFONTS
SYSM_WIN
FNFILE
FOXUSER
UPDATED
CUSER
ECUSER_NAMECTR
SHL_UP
BPROTECT
sBQUIT
NAMEO
_DIALOG
_THERM
SET_VIEW
CFILE_PATHCFILE_NAMESHLUSER
MEWINDOW
CCHOICES
ENCOL
\!\<GET
CCHOICE
FNCHOICE
SHLED
SHLPR
SHLSYS
ESHLUT
YESNO
_GETENVf
cMEMPATHf
FOXPRO.INI
GETENVF
_GETENVf
CGETENV
BGETENV
CRETURN
NFILE
NTEMP
CMEMPATH
_GETENV
Path not Found
Startup procedure not found
CFILE_PATHCFILE_NAMEFLD
BDISPLAY
FNPATH
ATHERR
E_PATHFNFILE
CFILE_PATHFLD
E_NAMEBFOUND
CDRIV_SEP
CPATH_SEP
SHELL
SHELL
SHELL
SHELL,USER
SET FILTER TO &cUSER
IF .NOT. (&cUSER)
User ID Edit Filter is
BFILTER
THCUSER
MECUSER_NAMECDATAPATH
SHELL
DBCLOSE
THCBROWSE
MECINDEX
CFILTER
R_NAMEFNGETENV
FNNAME
FNPATH
INITIAL
D:\SHL\
SHL.FXP
D:\SHL\SHL.PRG